home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Languguage OS 2
/
Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO
/
gnu
/
nihcl-30.lha
/
nihcl-3.0
/
test
/
object.v
< prev
next >
Wrap
Text File
|
1990-05-19
|
278b
|
11 lines
Test class Object
C is an instance of class Point
C = (1,2)
C->isKindOf(*Object::desc()): 1
C->isKindOf(*Class::desc()): 0
C->isKindOf(*Rectangle::desc()): 0
C->isA()->isKindOf(*Object::desc()): 1
C->isA()->isKindOf(*Class::desc()): 1
C->isA()->isKindOf(*Rectangle::desc()): 0